home *** CD-ROM | disk | FTP | other *** search
/ RenderOrgan / (WIN+MAC) RenderOrgan / renderorgan / renderorgan.img / mac / DIR / B2FZ.DIR / 00606_Field_606.txt < prev    next >
Text File  |  1995-10-27  |  2KB  |  73 lines
  1.  
  2. on exitFrame
  3.  global TexH ,MovH
  4.   set  the puppet of Sprite 5 to true
  5.   set the stretch of sprite 5 = false
  6.   set the castNum of sprite 5 to the number of cast "01-DeckA"
  7.   put the width of cast "01-DeckA" -628 + MovH*2 into TexH
  8.   if the mouseDown =true then go to the frame
  9.  end if
  10. end
  11.  
  12. on exitFrame
  13.   global MovH,TexH
  14.   if the mouseDown =true and rollover(5) then
  15.     set the locH of sprite 5 to the locH of sprite 5-4
  16.   else if rollover(5) then
  17.     set the locH of sprite 5 to the locH of sprite 5-MovH*2
  18.   else if the mouseDown =true then
  19.     go to the frame
  20.   else
  21.     set the locH of sprite 5 to the locH of sprite 5-MovH
  22.   end If  
  23.   if the locH of sprite 5<the stageLeft - TexH then
  24.     set  the puppet of Sprite 5 to False
  25.     sound stop 2
  26.     go to "A1"
  27.   end If
  28. end
  29.  
  30. on exitFrame
  31.   global MovH,TexH 
  32.   if the mouseDown =true and rollover(5) then
  33.     set the locH of sprite 5 to the locH of sprite 5-4
  34.   else if rollover(5) then
  35.     set the locH of sprite 5 to the locH of sprite 5-MovH*2
  36.   else if the mouseDown =true then
  37.     go to the frame
  38.   else
  39.     set the locH of sprite 5 to the locH of sprite 5-MovH
  40.   end If 
  41.   if the locH of sprite 5 < the stageLeft - TexH  then
  42.     set  the puppet of Sprite 5 to False
  43.     sound stop 2
  44.     go to "A1"
  45.   else
  46.     go to the frame-3
  47.   end If
  48. end
  49.  
  50.  
  51.   set  the puppet of Sprite 1 to true
  52.   set  the puppet of Sprite 1 to False
  53.  
  54.  
  55.   set the castNum of sprite 1 = the number of cast 5
  56.   set the visible of sprite 48 to False
  57.   puppetPalette "D1",28
  58.   chcur
  59.  
  60.  
  61.   global Rstart,Rstop,Mname
  62.   set Rstart = 172
  63.   set Rstop = 180
  64.   set Mname = "C3"
  65.   go to  "exWalk"
  66.  
  67.  
  68. set the visible of sprite 48 = true
  69.   QTSeem  395,403
  70.     set the castNum of sprite 1 = the number of cast 26
  71.   set the visible of sprite 48 to False
  72.   go to marker(1)
  73.